home *** CD-ROM | disk | FTP | other *** search
/ Trading on the Edge / Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin / pc / mac_file / vendor_d / neuralwa / nw2v50 / edbdalph.igb < prev    next >
Text File  |  1993-08-23  |  2KB  |  70 lines
  1. inst4.1     !Sept 10, 1992
  2. !****************************************************************
  3. !*                                *
  4. !*    EDBD Learning Rates                    *
  5. !*                                *
  6. !****************************************************************
  7. !
  8.  
  9. @LLsl                !Load super-layer
  10. =n6    Lpes            !Number of layers
  11. =LayN    0
  12.  
  13. ! Loop over all layers looking for EDBD learn function
  14. :EDBDAlph
  15.  
  16. !Look for an EDBD layer
  17. +LayN    1            !next layer
  18. ?LayN    n6
  19. >bgt    EDBDAEnd        !past output layer
  20. @LLly                !load the layer
  21. ?Llrn    "Ext DBD"        !EDBD learn function?
  22. >bne    EDBDAlph        !no, try again
  23. !
  24. !NOTE: following assumes that network builder assigns
  25. !different names to each layer
  26. =PNam    LDln            !probe name = layer name
  27.  
  28. ! Add probe
  29. =NPEl    LayN            !point to layer
  30. @PbAS                !Add Probe
  31. @PbDC                !Delete all components
  32. @PALy                !Add Near Layer to Probe
  33.  
  34. ! Now build the instrument
  35. @ILdD                !load default instrument
  36. =ITit    PNam            !Instrument title
  37. +ITit    " Lrn Rates"
  38. =IGTy    "Hist"            !Graph Type
  39. =IGVr    "AuxWt1"
  40. =ITTy    "RMS"            !RMS Transformation Type
  41. =ITMd    0            !No transformation
  42. =IEpc    0            !No epoch
  43. =Ignx    40            !#bars
  44.  
  45. ! Height and width
  46. =f0    Ignx
  47. *f0    5.0            !5 pixels per bar
  48. =Ihgt    50            !height of graph
  49. =Iwdt    f0            !Width of graph
  50.  
  51. =Ivmn    0.0
  52. =Ivmx    2.0
  53. =ILnA    1            !Active in Learn
  54. =IRcA    0            !Inctive in recall
  55. =ILDv    10            !Every 10 iterations
  56. =ILRm    0
  57. =IRDv    0
  58. =IRRm    0
  59. =IPrb    PNam            !Point to probe
  60. =ICAc    0            !Convergence criterion inactive
  61. =ICTh    0.0            !Convergence Threshold
  62. !Let NeuralWorks figure out where to put instrument
  63. =x    0
  64. =y    0
  65. @IAdd                !Now create instrument
  66. !
  67. >br    EDBDAlph        !Do next layer
  68.  
  69. :EDBDAEnd
  70.